home *** CD-ROM | disk | FTP | other *** search
/ Freelog 100 / FreelogNo100-NovembreDecembre2010.iso / Musique / solfege / solfege-win32-3.17.0.exe / {app} / bin / Lib / fpformat.py < prev    next >
Text File  |  2005-10-28  |  5KB  |  143 lines
  1. """General floating point formatting functions.
  2.  
  3. Functions:
  4. fix(x, digits_behind)
  5. sci(x, digits_behind)
  6.  
  7. Each takes a number or a string and a number of digits as arguments.
  8.  
  9. Parameters:
  10. x:             number to be formatted; or a string resembling a number
  11. digits_behind: number of digits behind the decimal point
  12. """
  13.  
  14. import re
  15.  
  16. __all__ = ["fix","sci","NotANumber"]
  17.  
  18. # Compiled regular expression to "decode" a number
  19. decoder = re.compile(r'^([-+]?)0*(\d*)((?:\.\d*)?)(([eE][-+]?\d+)?)$')
  20. # \0 the whole thing
  21. # \1 leading sign or empty
  22. # \2 digits left of decimal point
  23. # \3 fraction (empty or begins with point)
  24. # \4 exponent part (empty or begins with 'e' or 'E')
  25.  
  26. try:
  27.     class NotANumber(ValueError):
  28.         pass
  29. except TypeError:
  30.     NotANumber = 'fpformat.NotANumber'
  31.  
  32. def extract(s):
  33.     """Return (sign, intpart, fraction, expo) or raise an exception:
  34.     sign is '+' or '-'
  35.     intpart is 0 or more digits beginning with a nonzero
  36.     fraction is 0 or more digits
  37.     expo is an integer"""
  38.     res = decoder.match(s)
  39.     if res is None: raise NotANumber, s
  40.     sign, intpart, fraction, exppart = res.group(1,2,3,4)
  41.     if sign == '+': sign = ''
  42.     if fraction: fraction = fraction[1:]
  43.     if exppart: expo = int(exppart[1:])
  44.     else: expo = 0
  45.     return sign, intpart, fraction, expo
  46.  
  47. def unexpo(intpart, fraction, expo):
  48.     """Remove the exponent by changing intpart and fraction."""
  49.     if expo > 0: # Move the point left
  50.         f = len(fraction)
  51.         intpart, fraction = intpart + fraction[:expo], fraction[expo:]
  52.         if expo > f:
  53.             intpart = intpart + '0'*(expo-f)
  54.     elif expo < 0: # Move the point right
  55.         i = len(intpart)
  56.         intpart, fraction = intpart[:expo], intpart[expo:] + fraction
  57.         if expo < -i:
  58.             fraction = '0'*(-expo-i) + fraction
  59.     return intpart, fraction
  60.  
  61. def roundfrac(intpart, fraction, digs):
  62.     """Round or extend the fraction to size digs."""
  63.     f = len(fraction)
  64.     if f <= digs:
  65.         return intpart, fraction + '0'*(digs-f)
  66.     i = len(intpart)
  67.     if i+digs < 0:
  68.         return '0'*-digs, ''
  69.     total = intpart + fraction
  70.     nextdigit = total[i+digs]
  71.     if nextdigit >= '5': # Hard case: increment last digit, may have carry!
  72.         n = i + digs - 1
  73.         while n >= 0:
  74.             if total[n] != '9': break
  75.             n = n-1
  76.         else:
  77.             total = '0' + total
  78.             i = i+1
  79.             n = 0
  80.         total = total[:n] + chr(ord(total[n]) + 1) + '0'*(len(total)-n-1)
  81.         intpart, fraction = total[:i], total[i:]
  82.     if digs >= 0:
  83.         return intpart, fraction[:digs]
  84.     else:
  85.         return intpart[:digs] + '0'*-digs, ''
  86.  
  87. def fix(x, digs):
  88.     """Format x as [-]ddd.ddd with 'digs' digits after the point
  89.     and at least one digit before.
  90.     If digs <= 0, the point is suppressed."""
  91.     if type(x) != type(''): x = repr(x)
  92.     try:
  93.         sign, intpart, fraction, expo = extract(x)
  94.     except NotANumber:
  95.         return x
  96.     intpart, fraction = unexpo(intpart, fraction, expo)
  97.     intpart, fraction = roundfrac(intpart, fraction, digs)
  98.     while intpart and intpart[0] == '0': intpart = intpart[1:]
  99.     if intpart == '': intpart = '0'
  100.     if digs > 0: return sign + intpart + '.' + fraction
  101.     else: return sign + intpart
  102.  
  103. def sci(x, digs):
  104.     """Format x as [-]d.dddE[+-]ddd with 'digs' digits after the point
  105.     and exactly one digit before.
  106.     If digs is <= 0, one digit is kept and the point is suppressed."""
  107.     if type(x) != type(''): x = repr(x)
  108.     sign, intpart, fraction, expo = extract(x)
  109.     if not intpart:
  110.         while fraction and fraction[0] == '0':
  111.             fraction = fraction[1:]
  112.             expo = expo - 1
  113.         if fraction:
  114.             intpart, fraction = fraction[0], fraction[1:]
  115.             expo = expo - 1
  116.         else:
  117.             intpart = '0'
  118.     else:
  119.         expo = expo + len(intpart) - 1
  120.         intpart, fraction = intpart[0], intpart[1:] + fraction
  121.     digs = max(0, digs)
  122.     intpart, fraction = roundfrac(intpart, fraction, digs)
  123.     if len(intpart) > 1:
  124.         intpart, fraction, expo = \
  125.             intpart[0], intpart[1:] + fraction[:-1], \
  126.             expo + len(intpart) - 1
  127.     s = sign + intpart
  128.     if digs > 0: s = s + '.' + fraction
  129.     e = repr(abs(expo))
  130.     e = '0'*(3-len(e)) + e
  131.     if expo < 0: e = '-' + e
  132.     else: e = '+' + e
  133.     return s + 'e' + e
  134.  
  135. def test():
  136.     """Interactive test run."""
  137.     try:
  138.         while 1:
  139.             x, digs = input('Enter (x, digs): ')
  140.             print x, fix(x, digs), sci(x, digs)
  141.     except (EOFError, KeyboardInterrupt):
  142.         pass
  143.